home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / News Stacks / July'90AMUG News™.cpt / July'90AMUG News™ / background_4482.txt < prev    next >
Text File  |  1990-08-06  |  4KB  |  209 lines
  1. -- background: 4482 from stack: in
  2. -- bmap block id: 4860
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put the number of this card into fld "Page#"
  9.   --hide menubar
  10.   set scroll of bg fld 2 to 0
  11. end openCard
  12.  
  13. on openBackGround
  14.   get the locktext of bg fld 2
  15.   if it is false then
  16.     set locktext of bg fld 2 to true
  17.   end if
  18. end openBackGround
  19.  
  20.  
  21.  
  22. -- part 1 (field)
  23. -- low flags: 01
  24. -- high flags: 0000
  25. -- rect: left=440 top=318 right=335 bottom=466
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 1
  29. -- font id: 0
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: Page#
  34.  
  35.  
  36. -- part 2 (field)
  37. -- low flags: 01
  38. -- high flags: 0007
  39. -- rect: left=21 top=99 right=299 bottom=496
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 0
  43. -- font id: 31
  44. -- text size: 10
  45. -- style flags: 0
  46. -- line height: 14
  47. -- part name: Text
  48. ----- HyperTalk script -----
  49. on mouseup
  50.   put clickLine() into Num
  51.   ShowPict Num
  52. end mouseup
  53.  
  54.  
  55. -- part 3 (button)
  56. -- low flags: 00
  57. -- high flags: 0001
  58. -- rect: left=12 top=84 right=96 bottom=483
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 0 / 0
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: 
  67.  
  68.  
  69. -- part 4 (button)
  70. -- low flags: 00
  71. -- high flags: 0001
  72. -- rect: left=10 top=91 right=310 bottom=22
  73. -- title width / last selected line: 0
  74. -- icon id / first selected line: 0 / 0
  75. -- text alignment: 1
  76. -- font id: 0
  77. -- text size: 12
  78. -- style flags: 0
  79. -- line height: 16
  80. -- part name: 
  81.  
  82.  
  83. -- part 6 (button)
  84. -- low flags: 00
  85. -- high flags: 2000
  86. -- rect: left=195 top=315 right=335 bottom=225
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 4465 / 4465
  89. -- text alignment: 1
  90. -- font id: 0
  91. -- text size: 12
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: back
  95. ----- HyperTalk script -----
  96. on mouseUp
  97.   visual barn door open
  98.   go to card "Table"
  99.   Play "Click"
  100. end mouseUp
  101.  
  102.  
  103.  
  104. -- part 7 (button)
  105. -- low flags: 00
  106. -- high flags: 2000
  107. -- rect: left=224 top=316 right=336 bottom=254
  108. -- title width / last selected line: 0
  109. -- icon id / first selected line: 25234 / 25234
  110. -- text alignment: 1
  111. -- font id: 0
  112. -- text size: 12
  113. -- style flags: 0
  114. -- line height: 16
  115. -- part name: rewind
  116. ----- HyperTalk script -----
  117. on mouseUp
  118.   --visual wipe right slowly
  119.   lock screen
  120.   set scroll of bg fld "Text" to 0
  121.   go to prev cd
  122.   unlock screen with dissolve slowly
  123. end mouseUp
  124.  
  125.  
  126.  
  127. -- part 8 (button)
  128. -- low flags: 00
  129. -- high flags: 2000
  130. -- rect: left=253 top=316 right=336 bottom=283
  131. -- title width / last selected line: 0
  132. -- icon id / first selected line: 2749 / 2749
  133. -- text alignment: 1
  134. -- font id: 0
  135. -- text size: 12
  136. -- style flags: 0
  137. -- line height: 16
  138. -- part name: Forward
  139. ----- HyperTalk script -----
  140. on mouseUp
  141.   Play "Click"
  142.   --visual wipe left slowly
  143.   lock screen
  144.   set scroll of bg fld "Text" to 0
  145.   go to next cd
  146.   unlock screen with dissolve slowly
  147.  
  148. end mouseUp
  149.  
  150.  
  151.  
  152. -- part 9 (button)
  153. -- low flags: 00
  154. -- high flags: 2000
  155. -- rect: left=282 top=315 right=335 bottom=312
  156. -- title width / last selected line: 0
  157. -- icon id / first selected line: 6721 / 6721
  158. -- text alignment: 1
  159. -- font id: 0
  160. -- text size: 12
  161. -- style flags: 0
  162. -- line height: 16
  163. -- part name: ToFront
  164. ----- HyperTalk script -----
  165. on mouseUp
  166.   Play "Click"
  167.   visual Wipe Down
  168.   Go to card "1"
  169. end mouseUp
  170.  
  171.  
  172.  
  173. -- part 11 (button)
  174. -- low flags: 00
  175. -- high flags: 2000
  176. -- rect: left=224 top=316 right=336 bottom=254
  177. -- title width / last selected line: 0
  178. -- icon id / first selected line: 25234 / 25234
  179. -- text alignment: 1
  180. -- font id: 0
  181. -- text size: 12
  182. -- style flags: 0
  183. -- line height: 16
  184. -- part name: rewind
  185. ----- HyperTalk script -----
  186. on mouseUp
  187.   Play "Click"
  188.   --visual wipe right slowly
  189.   lock screen
  190.   set scroll of bg fld "Text" to 0
  191.   go to previous cd
  192.   unlock screen with dissolve slowly
  193. end mouseUp
  194.  
  195.  
  196.  
  197. -- part 12 (field)
  198. -- low flags: 00
  199. -- high flags: 0000
  200. -- rect: left=107 top=61 right=90 bottom=502
  201. -- title width / last selected line: 0
  202. -- icon id / first selected line: 0 / 0
  203. -- text alignment: 65535
  204. -- font id: 2
  205. -- text size: 20
  206. -- style flags: 0
  207. -- line height: 26
  208. -- part name: 
  209.